[求助]怎么样实现分页信息

<%
gz=request.Form("gz")
if gz<>"" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from s1 where 工资>"&request.Form("gz"),conn,1,1

num=rs.recordcount
rs.pagesize=2
pagecount=rs.pagecount
page=int(request("page"))
if page<=0 then page=1
if request("page")="" then page=1
rs.absolutepage=page
if rs.eof and rs.bof then
response.Write("暂时没有记录")
else
if page<>pagecount then
lablenum=rs.pagesize
else
lablenum=num-(page-1)*rs.pagesize
end if
for i=1 to lablenum

%>
<tr>
<td><div align="center"><%=rs("姓名")%></div></td>
<td><div align="center"><%=rs("员工编号")%></div></td

[求助]怎么样实现分页信息 asp分页代码，无法实现分页，求助 求助asp+xml如何实现分页效果 紧急求助！！！ asp+xml 输出到html如何实现分页？ {求助}asp分页在搜索后 分页程序不正常（急！！补充上一条信息） Delphi怎么实现分页 C#实现分页 displaytag无法实现分页 asp 实现不了分页 asp怎样实现分页